home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 February / PCWorld_2000-02_cd.bin / Software / Vyzkuste / xsetup / _SETUP.2 / Group3 / XQ MS AOE AOK.xpl < prev    next >
Text File  |  1999-10-12  |  2KB  |  52 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="5"
  3. "COUNT"="2"
  4. "UIPATH"="Program Options\Age of Empires"
  5. "NAME"="AOE: Age of Kings Tweaks"
  6. "LANGUAGE"="VBScript"
  7. "VERSION"="1.00"
  8. "TEXT 1"="Enable Tweaks"
  9. "TEXT 2"="Restore Default Settings"
  10. "DESCRIPTION 1"="Click "Enable Tweaks" to activate the "MFill NoStartup Msynch" tweaks in AOE games played over the Internet via the Internet Gaming Zone."
  11. "DESCRIPTION 2"="Click "Restore Default Settings" to undo the changes and revert to the default configuration."
  12. "DESCRIPTION 3"=" "
  13. "DESCRIPTION 4"=""MFill" fixes and prevents horizontal line problems and black screen areas on some video cards.  "MSynch" fixes lock-up problems that occur on some soundcards."
  14. "DESCRIPTION 5"=""NoStartUp" skips the start up video clip which becomes annoying since it opens each time by default."
  15. "DESCRIPTION 6"="If you wish for these items to work for non Internet Gaming Zone AOE games, you must manually add the options to your Start Menu shortcut per the AOE ReadMe file."
  16. "AUTHOR"="CptSiskoX"
  17. "COPYRIGHT"="Copyright (C) Xteq Systems - All Rights Reserved"
  18. "COMMENT 1"="For more information, go to http://www.xteq.com"
  19. "COMMENT 2"="Age of Empires (C) by Microsoft"
  20.  
  21.  
  22. sP="HKLM\Software\Microsoft\DirectPlay\Applications\Age of Empires II\"
  23. sV="CommandLine" 'str
  24. sV_Better="lobby MFill NoStartup Msynch"
  25. sV_Normal="lobby"
  26.  
  27.  
  28. 'Called when the Plugin is started
  29. SUB Plugin_Initialize
  30.  If RegPathExists(sP)=false then Disable()
  31. END SUB
  32.  
  33. 'Called when the Plugin should validate the Data the user has entered
  34. SUB Plugin_CheckData(ElementIndex)
  35. END SUB
  36.  
  37. 'Called when the Plugin should apply the changes
  38. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  39.  If ElementIndex=1 then 
  40.     Call RegWriteValue(sP & sV,sV_Better,1)
  41.     Call MsgInformation("Tweaks enabled")
  42.  else
  43.     Call RegWriteValue(sP & sV,sV_Normal,1)
  44.     Call MsgInformation("Default settings restored")
  45.  end if
  46.    
  47. END SUB
  48.  
  49. 'Called when the Plugin is about to be removed from memory
  50. SUB Plugin_Terminate
  51. END SUB
  52.